Calculatrices Casio Graphiques : Jeux, programmes, cours, pompes, astuces et programmation sur calculatrice graphique Casio et ClassPad 300 : programmes casio et jeux casio...

Goto B
Lbl 9
List 6[1]H
List 6[2]M
List 6[3]S
List 6[4]G
List 6[5]Y
List 6[6]R
List 6[7]U
List 6[8]T
List 6[9]K
Prog "~CAMELOT"
Lbl X
ClrText
Stop
Lbl S
ClrText
Locate 2,1,"YOU ARE KING ARTHUR,"
Locate 3,2,"KING OF CAMELOT."
Locate 2,3,"YOUR LAND IS UNDER"
Locate 1,4,"ATTACK BY THE MINIONS"
Locate 4,5,"UNDER THE BLACK"
Locate 1,6,"KNIGHT. SLAY HIM AND"
Locate 4,7,"RESTORE PEACE."
Goto T
Lbl T
Getkey=31Prog "~CAMELOT"
Goto T
Lbl C
Getkey=69Goto 9
Getkey=79Goto S
Getkey=47Goto X
Goto C
Lbl B
ClrText
1A
1B
Goto r
Lbl r
Locate 6,A,"A R T H U R"
A+1A
A=5Goto
Locate 6,A-1," "
Goto r
Lbl
Locate 8,B,"K I N G"
B+1B
B=4Goto A
Locate 8,B-1," "
Goto
Lbl A
Locate 1,7,"N"
Locate 1,7,"EN"
Locate 1,7,"REN"
Locate 1,7,"RREN"
Locate 1,7,"ARREN"
Locate 1,7,"WARREN"
Locate 1,7," WARREN"
Locate 1,7,"N WARREN"
Locate 1,7,"AN WARREN"
1A
Locate 1,7,"EAN WARREN
Locate 1,7,"SEAN WARREN"
Locate 1,7," SEAN WARREN"
Locate 1,7,"Y SEAN WARREN"
Locate 1,7,"BY SEAN WARREN"
Locate 1,6,"[F1] NEW [F2] LOAD"
100G
5S
25H
25M
0Y
0R
0T
0U
0K
Goto C